#  OUnit - an OPAQUE compliant framework for Computer Aided Testing
#
#  Copyright (C) 2010, 2011  Antti Andreimann
#
#  This file is part of OUnit.
#
#  OUnit is free software: you can redistribute it and/or modify
#  it under the terms of the GNU General Public License as published by
#  the Free Software Foundation, either version 3 of the License, or
#  (at your option) any later version.
#
#  OUnit is distributed in the hope that it will be useful,
#  but WITHOUT ANY WARRANTY; without even the implied warranty of
#  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#  GNU General Public License for more details.
#
#  You should have received a copy of the GNU General Public License
#  along with OUnit.  If not, see <http://www.gnu.org/licenses/>.
#

.PS
copy "sequence.pic";

# Define the objects
object(O,"o:Toolkit");
object(PageRunner, "Runner")
object(Application, "Application")
placeholder_object(P);
step();

# Message sequences
active(PageRunner)
message(PageRunner,Application,"addComponentInstantiationListener()");

inactive(PageRunner)
active(O);
step();
active(O);
message(O,O,"callbackLoop()");
create_message(O,P,"p:Peer");
inactive(O);
create_message(O,P,"p:Peer");
message(O,P,"handleExpose()");
active(P);
return_message(P,O,"");
inactive(P);
destroy_message(O,P);
inactive(O);

# Complete the lifelines
step();
complete(O);
.PE

